package zuk.clipvietfun.loadimageview;

import java.io.File;
import java.io.FileInputStream;
import java.io.FileNotFoundException;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.InputStream;
import java.io.OutputStream;
import java.net.HttpURLConnection;
import java.net.URL;
import java.util.Collections;
import java.util.Map;
import java.util.WeakHashMap;
import java.util.concurrent.ExecutorService;
import java.util.concurrent.Executors;

import zuk.clipvietfun.R;
import android.content.Context;
import android.graphics.Bitmap;
import android.graphics.BitmapFactory;
import android.graphics.Matrix;
import android.os.Handler;
import android.view.View;
import android.widget.ImageView;
import android.widget.ProgressBar;

public class ImageLoader {

	MemoryCache memoryCache = new MemoryCache();
	FileCache fileCache;
	private Map<ImageView, String> imageViews = Collections
	.synchronizedMap(new WeakHashMap<ImageView, String>());
	ExecutorService executorService;
	Handler handler = new Handler();// handler to display images in UI thread
	public ImageLoader(Context context) {
		fileCache = new FileCache(context);
		executorService = Executors.newFixedThreadPool(5);
	}
	boolean isCrop = false;
	final int stub_id = R.drawable.ic_launcher;

	public void DisplayImage(String url, ImageView imageView,
			ProgressBar progresbar, boolean b) {
		this.isCrop = b;
		imageViews.put(imageView, url);
		Bitmap bitmap = memoryCache.get(url);
		if (bitmap != null) {
			progresbar.setVisibility(View.GONE);
			imageView.setVisibility(View.VISIBLE);
			imageView.setImageBitmap(bitmap);
		}
		else {
			imageView.setVisibility(View.GONE);
			progresbar.setVisibility(View.VISIBLE);
			queuePhoto(url, imageView, progresbar);
		}
	}

	private void queuePhoto(String url, ImageView imageView, ProgressBar progressBar) {
		PhotoToLoad p = new PhotoToLoad(url, imageView, progressBar);
		executorService.submit(new PhotosLoader(p));
	}

	private Bitmap getBitmap(String url) {
		File f = fileCache.getFile(url);

		// from SD cache
		Bitmap b = decodeFiles(f);
		if (b != null)
			return b;

		// from web
		try {
			Bitmap bitmap = null;
			URL imageUrl = new URL(url);
			HttpURLConnection conn = (HttpURLConnection) imageUrl
			.openConnection();
			conn.setConnectTimeout(30000);
			conn.setReadTimeout(30000);
			conn.setInstanceFollowRedirects(true);
			InputStream is = conn.getInputStream();
			OutputStream os = new FileOutputStream(f);
			Utils.CopyStream(is, os);
			os.close();
			conn.disconnect();
			bitmap = decodeFiles(f);
			return bitmap;
		} catch (Throwable ex) {
			ex.printStackTrace();
			if (ex instanceof OutOfMemoryError)
				memoryCache.clear();
			return null;
		}
	}


	@SuppressWarnings("unused")
	private Bitmap decodeFile(File f) {
		try {
			// decode image size
			BitmapFactory.Options o = new BitmapFactory.Options();
			o.inJustDecodeBounds = true;
			FileInputStream stream1 = new FileInputStream(f);
			BitmapFactory.decodeStream(stream1, null, o);
			stream1.close();

			// Find the correct scale value. It should be the power of 2.
			final int REQUIRED_SIZE = 100;
			int width_tmp = o.outWidth, height_tmp = o.outHeight;
			int scale = 1;
			while (true) {
				if (width_tmp / 2 < REQUIRED_SIZE
						|| height_tmp / 2 < REQUIRED_SIZE)
					break;
				width_tmp /= 2;
				height_tmp /= 2;
				scale *= 2;
			}

			// decode with inSampleSize
			BitmapFactory.Options o2 = new BitmapFactory.Options();
			o2.inSampleSize = scale;
			FileInputStream stream2 = new FileInputStream(f);
			Bitmap bitmap = BitmapFactory.decodeStream(stream2, null, o2);
			stream2.close();
			return bitmap;
		} catch (FileNotFoundException e) {
		} catch (IOException e) {
			e.printStackTrace();
		}
		return null;
	}
	// decodes image and scales it to reduce memory consumption
	private Bitmap decodeFiles(File f) {
		try {
			FileInputStream stream = new FileInputStream(f);
			Bitmap bitmap = BitmapFactory.decodeStream(stream);
			int oHeight = bitmap.getHeight(); 
			int oWidth = bitmap.getWidth();

			if(isCrop){
				int nHeight = 180;
				int nWeight = 180;
				Matrix matrix = new Matrix();
				
				if(oWidth>=oHeight){
					float scale = ((float) nHeight) / oHeight;
					matrix.postScale(scale, scale);
					return Bitmap.createBitmap(bitmap, (int)((oWidth-oHeight)/2), 0, oHeight, oHeight, matrix, false);
				}else {
					float scale = ((float) nWeight) / oWidth;
					matrix.postScale(scale, scale);
					return Bitmap.createBitmap(bitmap, 0,(int)((oHeight-oWidth)/2), oWidth, oWidth, matrix, false);
				}
			}else{
				float wh = (float) 1.77777777777777777777;
				int nWidth = 320;
				float scale = ((float) nWidth) / oWidth;
				Matrix matrix = new Matrix();	
				matrix.postScale(scale, scale);

				if((float)oHeight<(180/scale)){
					int nHeight = 180;
					scale = ((float) nHeight) / oHeight;
					nWidth = (int)(oHeight*wh);
					matrix.postScale(scale, scale);
					return  Bitmap.createBitmap(bitmap, 0, 0, nWidth, oHeight, matrix, false);
				}

				if(scale==1&&oHeight==180){

					return bitmap;
				}else{
					int nHeight = (int)(oWidth/wh);
					int y = 0;
					if(oHeight>nHeight)
						y = (int) (oHeight-nHeight)/2;
					return Bitmap.createBitmap(bitmap, 0, y, oWidth, nHeight, matrix, false);
				}
			}

		} catch (FileNotFoundException e) {
		}
		return null;
	}

	// Task for the queue
	private class PhotoToLoad {
		public String url;
		public ImageView imageView;
		ProgressBar progressBar;

		public PhotoToLoad(String u, ImageView i, ProgressBar progressbar) {
			url = u;
			imageView = i;
			progressBar = progressbar;
		}
	}

	class PhotosLoader implements Runnable {
		PhotoToLoad photoToLoad;

		PhotosLoader(PhotoToLoad photoToLoad) {
			this.photoToLoad = photoToLoad;
		}

		@Override
		public void run() {
			try {
				if (imageViewReused(photoToLoad))
					return;
				Bitmap bmp = getBitmap(photoToLoad.url);
				memoryCache.put(photoToLoad.url, bmp);
				if (imageViewReused(photoToLoad))
					return;
				BitmapDisplayer bd = new BitmapDisplayer(bmp, photoToLoad);
				handler.post(bd);
			} catch (Throwable th) {
				th.printStackTrace();
			}
		}
	}

	boolean imageViewReused(PhotoToLoad photoToLoad) {
		String tag = imageViews.get(photoToLoad.imageView);
		if (tag == null || !tag.equals(photoToLoad.url))
			return true;
		return false;
	}

	// Used to display bitmap in the UI thread
	class BitmapDisplayer implements Runnable {
		Bitmap bitmap;
		PhotoToLoad photoToLoad;

		public BitmapDisplayer(Bitmap b, PhotoToLoad p) {
			bitmap = b;
			photoToLoad = p;
		}

		public void run() {
			if (imageViewReused(photoToLoad))
				return;
			if (bitmap != null) {
				photoToLoad.progressBar.setVisibility(View.GONE);
				photoToLoad.imageView.setVisibility(View.VISIBLE);
				photoToLoad.imageView.setImageBitmap(bitmap);
			}

			else {
				photoToLoad.imageView.setVisibility(View.VISIBLE);
				photoToLoad.imageView.setImageResource(R.drawable.img_notfound);
				photoToLoad.progressBar.setVisibility(View.GONE);
				// photoToLoad.imageView.setImageResource(stub_id);
			}

		}
	}

	public void clearCache() {
		memoryCache.clear();
		fileCache.clear();
	}

}
